procedure 0
  draw
  pen colour = darkgreen
  right 90
  forward 8
  pen colour = random
  dot 1
  pen colour = darkgreen
  left 135
  forward 4
  left 90
  forward 4
  left 225
  fill darkgreen
  pen colour = random
  dot 1
  move
#display: x=0, y=0, grid=32

procedure 1
  draw
  pen colour = darkgreen
  right 90
  forward 6
  pen colour = random
  dot 1
  pen colour = darkgreen
  left 135
  forward 3
  left 90
  forward 3
  right 135
  fill darkgreen
  pen colour = random
  dot 1
  move
#display: x=0, y=0, grid=32

procedure 2
  draw
  pen colour = darkgreen
  right 90
  forward 4
  pen colour = random
  dot 1
  pen colour = darkgreen
  left 135
  forward 2
  left 90
  forward 2
  right 135
  fill darkgreen
  pen colour = random
  dot 1
  move
#display: x=0, y=0, grid=32

procedure 3
  draw
  pen colour = darkgreen
  right 90
  forward 2
  pen colour = random
  dot 1
  pen colour = darkgreen
  left 135
  forward 1
  left 90
  forward 1
  right 135
  fill darkgreen
  pen colour = random
  dot 1
  move
#display: x=0, y=0, grid=32

procedure 4
  paint 0
  forward 2
  right 90
  forward 1
  left 90
  paint 1
  forward 2
  right 90
  forward 1
  left 90
  paint 2
  forward 2
  right 90
  forward 1
  left 90
  paint 3
  forward -6
  left 90
  forward 3
  right 90
#display: x=0, y=0, grid=29

procedure 5
  draw
  pen colour = brown
  repeat 2 times
    forward 3
    right 90
    forward 2
    right 90
  fill brown
  move
#display: x=0, y=0, grid=32

procedure 6
  paint 5
  left 90
  forward 3
  right 90
  forward 3
  paint 4
  forward -3
  right 90
  forward 3
  left 90
#display: x=40, y=292, grid=52